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ABSTRACT 


Computer program portability is a measure of the effort 
which must ke expended when transferring a program from one 
environment to another. Historically, there have been 
several approaches to portability, but most have met with 
little success. . The problems of portability are presented, 
along with techniques available to computer programmers to 
solve or alleviate those problems. Concurrent with this 
study, a portable preprocessor/editor was designed. The 
preprocesscryeditor was intended to give FORTRAN users a 
machine-inderendent means of character output and provide a 


simple editor for text manipulation. 
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I. INTRODUCTION 

Of majcr concern to the computer industry in recent 
years has tk;een what W. M. Waite [Ref. 1] describes as the 
“Software Crises." That is, the problem of reprogramming 
when the need arises to transport software from one machine 
to another must be given major consideration as a factcr in 
computer prcgram portability. The ease which the transfer 
is accomplished is measured by two factors, portability and 
adaptability. Portability can be defined as a measure of 
the ease with which a program can be transferred front one 
environment to another, while adaptability is a measure of 
ease with which a program can be altered to fit differing 
user applications [Poole and Waite, 1973]. Although the 
differences between the two are not always well defined in 
practice, the ha jor distinction lies in the akove 
definitions. Where portability deais with envirenmentai 
changes, such as word length, adaptability is concerned with 
changes in algorithm structure. 


A. RESEARCH GOALS 

This research wasS an initial study of program 
portability. It was intended to present a broad picture of 
the problems of software transferability and provide some 
insight to how those problems could be solved. The 
programming of a preprocessor/feditor was undertaken to 
provide some insight to the problems of portability while 
providing a facility to allow machine-independent FCRTRAN 


based software. 


B. TERMS AND CEFINITIONS 
The following terms and their definitions are provided 
to give the reader a better understanding of the terminology 


used. 
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As used here, bootstrapping is a process commonly 
used in compiler implementation. The process is used when a 
compiler for a source language L (or a subset of L) is 
implemented cn a particular machine and the compiler is to 
be written in the language L. Gries [Refs 2] offers the 
following explanation in the form of an exercise: 

Write a compjler in epeubly language for a small 
subset mat of L. This subset should be Smail, so that it 
is easy Oo igplement, but large enough to be used in the 
next step. The next atEP 1s to rewrite the compiler for 
L[{0] im itself and check it out. Now, .we try to 
"hootstrap™ our way up to LL in ae_series of steps as 
follows. At eac Step 2s 20H Vy osiny Re “CR EeAR She 
conpaect £or L[i-1,] to a compiler for a bts La Je by 
inplementing other features of the desired language [f. 

2. Macro 
A macro gives the programmer the ability to refer to 
a specific ccde sequence by mentioning a single predefined 
name. Waite [{Ref. 3] defines macros as having a form 


Similar to the following: 
MACRO NAME (P1,P2,...«,Pn) 
Code Body 
END 


_The words “MACRO" and “END serve to_ delimit the 
definition, "NAME" is the macro name, and "Pi" through 
"En" are formal parameters. The code body is a series of 
dines which may contain instances of the formal 
parameters. 

Unlike subroutine calls which occur at run time, macro 
expansion is the result of a preprocessing function. That 
is, when a macro call is recognized, actual parameters are 
substituted for formal parameters and the desired code is 
inserted at the point of the macro call. 
3. firanslator A 

McKeeman (Ref. 4] defines a translator as a 
"function whcse domain is a source language and whose range 
is contained in a target language." Simply stated, it is a 


Mapping of one language into another. 


There are many factors which contribute to the prcblems 
of program portability. These factors may range frogs the 
manufacturer's unwillingness to produce compatible machines 
to the scftware ccnomunity which, as stated by Fleiss, "has 
not provided the necessary guidelines or standards for 
program design, codiag and. documentation" [Ref. 5]. Because 
of these factcrs, one finds it necessary to develop portable 
software. Two approaches to solving the problems of 
portability are discussed: MACRO processors and high level 
language programming. 
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II. MACRO PROCESSORS 

Various approaches to portability through the use of 
macro processors have been attempted in the past. AS early 
as 1961 an attempt to enhance portability was undertaken in 
a project known ae SLANG. This project was somewhat 
Similiar to another early approach, UNCOL. Both systems 
used translators and were based upon the premise that a 
translator can be written in a single intermediate language. 
Poole and Waite [Ref. 6] attribute the failure of these 
systems to their "simplistic" modeling. The variety of data 
bases and operators jn existing languages necessitates a 
more comprehensive approach to abstract machine modeling. 
As Halpern [Ref. 7,] points out, “with new conputer 
applications being found daily, with the computer-using 
populaticn growing at a still accelerating pace, and with 
that population taking on an increasingly lay character, the 
notion of a universal language is indefensable tcday." 
Since the computer world has somewhat settled on a 
multiplicity of languages, the above statement seems to 
hold. Processors on the other hand, are generally tailored 
to fit one language necessitating a multitude of compilers. 
The need is for a software processor which can handle the 
variety of ianguages which exist today and is somewhat 
extendable to meet the needs of future languages. To this 


end, the macro processor has been developed. 


A. THE MCBILE PROGRAMMING SYSTEM 

The Mobile Programming System is a translator systen 
consisting of two levels, SIMCMP and STAGE2. The system is 
a “powerful macro processor designed specifically as a_ tool 
for constructing machine-independent software’ [‘Ref. 8]. 
The uniqueness of the Mobile Programming System is that 
unlike rost approaches to portability through macro 


processors, it does not require an existing versicn of 
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itself. The system can be bootstrapped on most contemporary 
computing machines starting with the simplified translator 
called SIMCNF. 
1. SINCHE | 
SIMCMP (simpde compiler) is a simple macro processor 
used to translate any source language which can be defined 
by macres with single character parameters. The SIMCMP 
algorithm consists of two distinct phases, macro definition 
and macre expansion. During the macro definition phase, all 
Macres are readrin using macro names or "templates" as the 
start of the definjtion and an end-of-line flag to delimit 
the definition. Once the definition phase is complete, 
expansion begins. In the expansion phase, each line cf the 
source code is read. The source statement is matched with 
the predefined templates. If a match is found, the 
corresponding macro code body is’ punched out and the 
translator continues. If no template match is found for a 
line of source code, the code is treated as a statement in 
the base language. Reading a blank line from the source 
code terminates the process. 
2. STAGE2 
The second level of the bootstrapping process is 
STAGE2, consisting of a more powerful processor written in a 
language capable of being translated by SIMCMP. The purpose 
of STAGE2 is to gfrovide a means for implementing machine 
independent software. Software support of STAGE2 has_ been 
kept minimal and, as Waite [Ref. 8] pointed out, only five 
basic functions are required of the supporting machine. 
1. read one line 
2. detect end-of-file 
3. write one line 
4. write end-of-file 
5. rewind 
STAGE2 employs a scanner to recognize macro calls 
and isolate parameter strings. Template matching is used 


for recognition of macro calls. Where SIMCNHP was a very 
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Simple processor, STAGE2 is a more powerful and flexible 
processor providing the user many fuctions. The macro 
facilities of STAGE2 are similar to more powerful macro 
assemblers, and will be reviewed below for completeness. 

a. Storage 

STAGE2 provides’ three levels of stcrage: 
parameter storage, associative memory, and up to nine 
input/output files. 

Macros have storage space for nine parameters, 
with parameter storage local to the macro body. That is, 
the parameters are availabie only to the code body cf the 
macro in which they were declared. Because nested macro 
calls are allowed, parameter values are saved during these 
calls. At the end of the code body, however, all parameters 
associated with that macro call are lost and net 
retrievable. 7 

The associative memory is Similar to the COMMON 
statement in FORTRAN programming. That is, the associative 
memory area is global to the entire set of macro calls and 
provides a means for transferring information between 
macros. 

"By suitable processor functions the user can 
direct output generated by STAGE2 to any file on which 
writing is allowed. The input may be switched to any file 
on which reading is allowed" [Ref 8]. Multi-pass operations 
are possikle since the input/output files can be used for 
temporary stcrage of intermediate text. 

b. Arithmetic Expression Evaluation 

Addition, subtraction, multiplication, and 
Givision can be performed by STAGE2. All arithmetic 
evaluations must be of integer type. That is, the operands 
must be either integers or symbols, where each symbol has an 
associated integer value stored in associative memory. 

c. Conditional and Loop Operations 
String equality and the relative magnitude of 


two expressions can be tested. As a result, an oftica is 
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available where the ability to skip a predetermined amount 
of code is available. The code body of the calling macro 
may be exited on this type of conditional kEranch. Looping 
within a macro call js also available. Similar in structure 
to a FORTRAN DO-Loop, the calling macros code body may be 
duplicated more than once. 

As pointed out ealier, the Mobile Programming System can 
be bootstrapred on a target machine without an existing 
version of itself. SIMCMP is defined in FORTRAN because of 
the high availability of FORTRAN compilers. However, if a 
FORTRAN compiler is not available, SIMCMP is easily coded in 
assembly language on most computers. STAGE2 is written in 
FLUB (First Language Under Bootstrap) and can be compiled 
with SIMCMP. After STAGE2 has been implemented in its 
Simplest form, it is "Bootstrapped" until the desired level 
is reached. As Poole and Waite {Ref. 1] point out, the 
resulting software is, therefore, tailored "tc the 
particular problem at hand" and its complexity is extended 


only "as the need arises." 


B. LIMP 

LIMP (Language Independent Macro Processor) [Ref. 7] is 
_ presently used to process text for eight different 
compilers. LIMP embodies the concept of a macro processor 
which is independent of assembly language. Based upon the 
idea of string manipulation with parameter substitutuicn, it 
has the capacity to allow the programmer to alter the 
behavior of a specific compiler without redefining the 
entire language. 

Somewhat similar to the Mobile Programming System in 
operation, LIMP provides a much broader means of macro 
definition. Although still referred to as a template, the 
line which introduces the macro definition may be any 
arbitrary string of characters. A special parameter symbol 
is used to indicate the positions of parameters. Waite 


{Ref. 9] suggests "this approach frees the system from any 
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arbitrary forpat restrictions of a particular language - 
templates can be written in a form suited to the language at 
hand." Any code line which cannot be matched to a teuplate 
is copied directly to the output source without change. 
1. Barameters 

A maxinym of nine formal parameters may be specified 
within the macro code body. They are specified by their 
relative rfosition in the macro definition template using the 
integers one through nine. Unlike the usual substitution of 
actual for formal parameters, LIMP allows several conversion 
types by indicating the desired subscript on the relative 
address of the parameter. fhe conversion digits describe 
the ways in which the actual parameter string may be used in 
each substitution. When more than nine formal parameters 
are needed, a private tree may be used to stcre intermediate 
results, as described below. 

2. 4rees 

Three types of trees are available in LIMP: private 
tree, symbol tree and template tree. As mentioned earlierx, 
private trees may be used to store intermediate results when 
an excess of nine patameter strings are needed. Except for 
the macre ccde body, which is converted to iist structure 
when defined, all input source code is considered in string 
form. It is, therefore, not possible to use _ string 
operations to make changes within the code body. If the 
user forsees the need to alter the code body of a macrc, the 
code body can be stored in the private tree as a string. It 
is then fossible to redefine this string as the code bcdy of 
any template. 

The symbol tree is used to store symbols which are 
either created by parameter cails or direct declaraticn by 
the user. In conjunction with this, any symbols added to 
tae tree are automatjcally given the current value of a 
built-in location counter or explicitly assigned ty the 
user. 


The template tree contains the templates cf all 
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defined macres. When an input line is matched to a 
template, actual parameter strings are created and the 
associated macro code body is duplicated, The user may 
reenter the definition phase by using a special command to 
define ancther tempiate and add it to the template tree. A 
blank line after the macro definition causes the system to 
return tc the expansion phase. 

The LIMP system does, to some extent, solve the problems 
of languages being tailored to fit target compilers. It 
allows flexibility in software which is critical to the 
proklems of transferability. W. M. Waite suggests that, 
with planned extensjons, LIMP could far surpass the rcle of 
present macrc processors and "would have the power of a 
Syntax directed compjler" [Ref. 9]. 

Both the Mobile Programming System and LIMP have enjoyed 
some degree of success. The Mobile Programming System has 
been inplemented on eight different machines with a maxinun 
of two man weeks required for implementation. As Poole and 
Waite point out, "it is not even necessary to have access to 
a running version of the system on another machine; a 
listing, tape or BCD deck is sufficient" [Ref. 1]. LIMP, on 
the other hand, was not designed with the same goals in 
mind. The degree of independence of LIMP is directly 
related to the availability of a WISP compiler on the target 
Machine. WISP is currently available on the IBM 7094, 7040, 
GE 265, ENGLISH ELECTRIC KDF9, ELLIOT 803, EDSAC 2 and 
ATLAS 2 computer systems. Once implemented, LIMP is capable 
of processing text for eight different compilers. Asa 
- result, text acceptable to LIMP attains some degree of 
machine independence. 

While the use of macro processors is a valid approach to 
portability, the development of standardized high-level 
language compilers opens the door to programming in a 
high-level language to attain a degree of portability. 
Software written in high-level languages have been 
reasonakly successfud in the field of transferrability. 
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III. HUGH-LEVEL LANGUAGE PROGRAMMING 


The use of high-level languages is evident in many 
attempts to enhance portability. The macro processors 
mentioned previously can themselves be highly portable 
systems if written in a widely available high level 
language. If this approach is not taken, the job of 
transferring the system deteriorates to one of reprogramming 
in assembly language. The alleviation is to code the 
applicaticns programs by coding directly in universally 
available high-level languages. 


A. STANDARDIZATION 

The need for standardization of programming languages is 
evident. "This opinion is reflected by the existence of 
standards ccmmittees such as ANSI (American National 
Standards Institute) which have been organized for most 
popular languages" [Ref. 5]. Industry is very much 
concerned with maintaining a degree of standardization. 
-"Presently, there are COBOL precompilers that enforce 
Management selected language usage constraints. Information 
Management Inc., for instance, has MAGIC Standards Enforcer 
which notes use of management~prescribed COBOL verbs. Arkay 
Computer Applications' MECCA flags about 200 manacement 
selected violations" [Ref. 5]. These standard enforcement 
packages are largely oriented toward maintaining uniformity 
of the listings for the sake of readability, but they can 
flag the use of any selected reserved words. In order to 
standardize programming languages, in 1969 the UNITED STATES 
NAVY issued OPNAVINST 10462.8. This instruction explains 
the Navy's need for standardization and sets forth well 
documentated standards for the COBOL, FORTRAN, and JOVIAL 
programming languages. Standardization allows the coding of 
applicaticns programs within the constraints Gf. a 


programming language. The implementation of that program on 
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any target machine is dependent cn compiler availability and 
a minimums consideration of machine-dependent aspects, such 
Iso 
The 
language comrilers is a problem which is rapidly decreasing. 
As early 1966, the 
issuing SECNAVINST -10462.8 


computer acquisitions 


as word size, interfaces, character sets, and 


_ peripherals. availability of standardized high-level 


as Navy attempted standardization by 
that © all 
and FCRTRAN 


realizes 


which demands 
specify COEOL 
The 


new 
must 


compilers as a mandatory requirement. Navy 


that certain high-devel languages are better for different 
user reguirements, and, while it linits and standardizes the 
allowed high level languages, it provides a wide base for 


running its software. , 
Standardization is lost when a language is extended to 


meet certain specialized needs. It seems that even the most 


powerful high level language compilers are altered to 
provide extra features deemed necessary by implementors of 
the ccnpiler. These features are added at the expense of 
the transferability ef programs coded for processing by the 


"improved" compilers In time, however, even these extended 
languages may become standardized. ANSI FORTRAN, LOE 
example, is an extension of the original FORTRAN IV 
language. If extended languages are implemented, their 
compilers can be written to scan source code for factors 


which influence portability. 
should flag of 


“Whenever possible, compiiers 


usage non-standard language features that 


they iuplement. WATFOR ... is an excellent example of 
fulfilling this function"[{ Ref. 5]. 
One successful method of extending a language is to 


write a preprocessor which converts the extended language 


into a standardized language. 
at Stanford University, is an 
extension without significant 


in ANSI standard FORTRAN IV, 
itplemented on a wide variety 
processor translates the 
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MORTRAN, a language developed 
example of high-level language 
loss of portability. Hrittea 
the MORTRAN processor can be 


of machines. The MCRTRAN 


MORTRAN input text directly into 
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FORTRAN statements which can be compiled by the user's 
FORTRAN campiler. MORTRAN's features include: 

1. free field format 

2. adphanumeric statement lables 

3. cCcpmments inserted anywhere in the text 

4. multiple assignments 

Se implicit looping and block structure 


62 Statements such as FOR-BY-TO, WHILE, 
UNTIL, and IF-THEN-ELSE 


7. user defined macro-instructions 


8. biocks of normal FORTRAN statements 
inserted in the text 


These extensions afford the FORTRAN user a powerful language 
which retains the qualities cf portability inherent ina 
standardized language such as FORTRAN. 


' 


i 
B. STRUCTURED PROGRAMMING 


Programming in a standardized, widely available 
high-level language offers more than just a multiplicity of 
compilers. The programmer has the opportynity to enhance 
the transferability of software by using the techniques of 
structured programming. Structured programming can be 
thought cf as "the goal of evolving a program so that its 
final structure can be presented or described as a hierarchy 
of tasks or blocks" [Ref. 10]. Because those areas of 
computer software whjch retain machine dependencies must be 
altered when a transfer of software is to be affected, it is 
beneficial tc the personnel performing the transfer to 
easily identify those dependencies. Structured, or mcdular 
programming, makes it "possible to study the system one 
module at a time" [Ref. 5] and therefore increases the ease 
of comprehension of the systen. This type of modular 
programming can be used to segregate these areas in the 
software which may contain machine dependencies. Knokrledge 
of the entire system or unrelated modules is, therefore, not 
reguired to accomplish the task of making the needed 


changes. 


19 


: 7 } a : 
7 ‘ ie f : 
Ser ets A Cae yee 
aes Mikal: rom, AA bad are 
Br You NT 8 Ge ae ae ver 
Uns hi ee: rhe y* os eae ie Ny , i ; 


int 
Kr 


“oe a ap a 


bh leg | ~astopaylaesy 
‘pabsoanys joold bes Pakgoos « as 


sELTEN, (OP7TE=90 Be doge Bese 
“18 Robt abat eat ot3 we mer — e ‘ 
‘Seaubo daze RALtBOR 4 tem. | Se 
Saini Silos 6 2628 wAaTaOs. wG3.0% ths: 3 nin ona 
s ai taexzedal ytilldsiazoq bo seltifsgp . att eae hed 
-Kbareos ser fown. : bee 


oe AOORS 
Gidsilavs  yisBiv \besibasbaste p * ae tegang 
lo (etaiteigton & 3@ut adds sios b1s3te openenul tees 
eonsdae oF Ytldysaogio edt aga Avatar pod. ss y 7 
$e weve tadosd wdd sabes YO stav2z08 be pee ee ory 
ad BED Galuesapo2g. beshsoear2 ‘eatadaigen) a 
SSL to G6 e62p03q s paivfors ko fpap aae¥ ae ro. 
Wowsxreid & aé Betizoaesi to beteeneig od nus caieiec 
to. 40584 ° @nolt ecxasasea [Qt .3eaj Sudo” 495 } 
ed #tve T+lonoineqdeh serdose aigses do bas desebiae 
ai Ji ,Ses9033s od oF el Stsvstos 46 GuSdanay te aeay | i , 
CF  3293arn2s -ods pristotizeg sénhoaxsd ods oF ‘tats bag: 
tsivhoe TO ASIusouTsI2 .metonshbaaqed seeds tls debe eet 
oa bolveya’- odZ ybode 93 eldieaog* be waded stakmadapong 
PAsD (BSLOTOML Stotetets Soe €E teh} Voakst & te einboa 


BN se vi 
ren) 
ys 


“ 


-Si0b0e io aedcys ' abdt <coteayve off 46 we oitasisagaos 29 
Sos “/ B51 200? evapotide of Bean Of fas baiwesaporg 
9 won svivasbsegeh satdoge aistass Ven dokdv ezsus ion 

é? ,#) eeloices betesoctan 70 weseya eakiae Gis Yo 
coy pitied io dead. ‘eda detigeosas oe Beakbpen’ 


+eeynsdd 


FORTRAN is an excellent example of a high-level language 
which can ke easily modularized. "The ability to divide 
machine/system dependent and independent attributes into 
separate entities via sub-programs greatly enhances the 
transferability of programs" [Ref. 5]. The compiler for 
INTEL‘s PL/M language was written in ANSI standard 
FORTRAN [Ref. 11]. Because the compiler was written using 
the concepts of structured programming, machine dependencies 
were easily isolated from the remainder of the system. AS a 
direct result of the modular design and standardized base 
language, PI/M has been easily implemented on eight 
different machines with little or no difficulty. 
Input/output file names are contained within two subroutines 
and can easily be accessed for change. Once implemented on 
a specific ccmputing machine, sections of the PL/M compiler 
May be accessed to increase efficiency. This has been 
demonstrated on the IBM System/360. A forty percent 
decrease in compile time was achieved by repiacing the 
FORTRAN method of shifting with an assembly language shift 
and mask operation. This adjustment, plus the 
implementation of an assembly language input/output package 
and the use of the FORTRAN H optimizing complier, ailcwed 
compilatica of PL/M programs in less than half the time 
required Ly the first version. The total effort expended to 
facilitate these changes was twenty-four man hours, 

The advantages of coding in a standardized language 
Similar to FORTRAN are apparent. As Hamlet [Ref. 12] foints 
out, “only schemes based on ANSI FORTRAN really move easily 
among different computers." As discussed earlier, the 
Mobile Programming System is written partiy in ANSI FORTRAN. 
The portability of the entire system is somewhat dependent 
upon the ability to implement SIMCMP on the target comruter. 
As a result of the variety of portable software which has 
been writter, an ANSI FORTRAN based preprocessor/editor was 
written with the goal of achieving scme degree of 
portibility. 
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IV. PREDITOR 


PREDIIOR (PReprocessor/EDITOR) was implemented in ANSI 
FORTRAN using the concepts of structured programming. This 
was considered to be a viable approach to ° machine 
independent software. PREDITOR iS -a preprocessor/editor 
which is capable of processing a smail super-set of FORTRAN, 
Called FORTRAN+, and allows changes to existing prcgrams 
with a simplified text editor. 

AS an implementation language, FORTRAN is deficient in 
some areas. For example, ANSI FORTRAN does not provide a 
string data type. Some aspects of FORTRAN, such as the 
COMMON statement for representing global variables, have 
caused many mag hours of work when a program change is 
necessary. FORTRAN# attempts to solve sone of the 
inadeauacies of character manipulation inherent in FCRTRAN 
and make the alteration of large software packages an easier 
task. In addition, the text editor section of PREDITOR 
includes four useful editing functions. 

1. insert a line of code 

2. delete a line or sequence of code 
3. copy a predefined sequence of code 
4. sequence the source file 

The above functions are invoked using a nuater of 
"control toggles," a patch file containing desired changes, 


and a user's sequenced source file. 


A. INDEFENDENT ASPECTS 

Because of the availability of standard FCRTRAN 
compilers, EREDITOR offers a highiy portable package. 
Structured programming and machine-indefendent character 
representation allows the data structures and internal logic 
te be transparent to the user and target machine. fhe 
modular design has also allowed for the isolaticn of 


input/foutfut processing. This results in a flexible system 
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for user reassignment of peripheral devices, particularly in 
the program transfer stage. Word size varies widely from 
machine to machine, and thus must be considered an important 
factor in fportability. PREDITOR uses machine word size to 
its advantage. By packing applicable input data, memory 
requirements are minimized. This allows existing software 


to be preprocessed for use on target machines with different 


word lengths while minimizing machine storage requirements. ° 


B. DEPENDENT ASPECTS 

PREDITOR contains some machine dependencies. The data 
which PREDITOR must access during execution is facked 
according tc host machine word size. if” BPREDITCH, 36 
transferred to another machine, this data must be refgacked 
acccrding to the new machine word size. PREDITOR itseif can 
be used to process the appropriate statements and provide a 
copy of the reformatted data. The syntax tables which are 
vital to the compiler portion of PREDITOR are also machine 
dependent and can he reconstructed for the hcst machine. 

Special characters which trigger PREDITOR functions nay 
conflict with predefined uses of those characters in 
existing target machines. For example, the dollar sign is 
used aS a ccmment indicator in the xXDS Sigma 7. The 
reserved dollar character can easily be changed in any 


implementation. 


C. METHCDS CF TRANSFER 

Prior to transfer to a new environment, certain 
dependencies must be accounted for. Word size dependent 
Syntax tables and packed output data must be replaced with 
tables and data generated for the target machine. 

Inputyoutgput files presently reflect the file numbers of 
the IBM System 360. These file numbers may Le redefined to 
meet user requirements or existing system file definitions. 
All areas which may need to be altered are clearly marked in 
the source listing of PREDITOR. 


If a conflict involving the use of special characters 
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which trigger PREDITOR functions exists, FREDITOR must be 
altered. An alternate character must be defined and 
iaplemented in the systen. 


D. OPERATING PROCEDURES 

PREDITOR is a one pass system. During the pass, the 
source program is scanned and ail improperly formed 
statements are detected. A listing of the source progran 
can be oktained and errors are listed by line number. Error 
messages take the form: 


*ex*e* ERROR(X) NEAR LINE 
*kxxx Brief explanation of error 


The mumber x corresponds to the error number and y is the 
line number where the error occured. The line which 
immediately follows gives a brief explanation of the 
particular error message. See Appendix C for a cogrplete 
list of error messages. 

File numbers used in PREDITOR, along with the 
corressponding device types are listed in Appendix D. These 
IvyO file numbers may be set prior to execution or during 
execution by using available control switches. 

PREDITOR begins by reading a record from the input file. 
The PREDITOR processor translates the FORTRAN+ input text 
directly to FORTRAN statements, which are then compiled by 
the user's FORTRAN compiler. $$ Control switches are 
usually set at this time by the user. If not, ccntrol 
Switches are set to default values. If the edit mode is not 
selected, the source file will be preprocessed as is. If 
editing is desired, GOFERS will merge the patch deck and the 
source file and process it normally. Figures 1 and Zz show 
typical patch deck and source file composition. When the 
nines cards are read, the operation is complete. The 
resulting merged file is then ready to be compiled fron the 
temporary stcrage area. 
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$$ Control Switches 


(these consist of either contrel toggles 
or control switches and are used as desired.) 


$$PATCH (Required) 


$$ Statements 


(These cards are used to. delete or add ccde 


to the source file.) 


99999999 Mines card required.) 


Figure 1 
A Typical Preditor Patch File 


$$xx Statements (if desired) 


(These are used in conjunction with 
the $ COPY command) 


$$ SOURCE (Required) 


$ Command Statements 


(Th 


z se include $ OUTPUT, $ COPY and 


e 
APPZND VERSE.) 
(nines card required) 


Figure 2 
A Typical Preditor Source File 
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Ej $$ STATEMENTS 

The $$ Statements are used to initialize PREDITCR and 
alter the predefined states of control toggles. $$ SOURCE 
marks the beginning of the source file. Ail statements 
following the $$ SOURCE are considered as part of the 
source file until a "nines card" (99999999 in columns 73-80) 
is detected. 

The $$ PATCH incicates the beginning of the patch deck. 
The patch deck defines additions and deletions to the source 
file. All statements following the $$ PATCH are considered 
as part of the patch deck until a nines card (99999999 in 
columns 1-8) is detected. Patch deck cards are cf tro 
forms: 


1. insert a card of code 
XxXXxXxXxxxx CODE BODY 


2. delete a body of code 
XXXKXXUX*YVYVVYYY 


The xxxxxxxx field is in columns 1 - 8 and indicates that 
the CODE EODY (columns 73-80) is to be inserted prior to a 
source file record of equal or greater sequence number. If 
a star (*) appears in column nine, the records to be deleted 
begin with sequence number xxxxxxxx and end with seguence 
number yyyyyyyy inclusive. 

$$xx statements are used to define a portion of text 
which is to ke copied into the executable source file. The 
dollar signs ($%) are placed in columns 1 and 2 with the xx 
field in columns 3 and 4. The xx field is any integer 
between 1 and 99 and represents all text which follows until 
another dcllar sign is found in columa 1. This text may be 
copied into the new source file with the call $ COFY xx. 
This allows the user to make changes to statements such as 
FORTRAN COMMON, which may be used frequently throughout a 
program. fo facilitate the change, the user need only make 
the change in the definition stage as mentioned above. All 
$$xx statements and their associated text are physically 
placed directiy before the $$ SOURCE card. 
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Other control switches take two forms: control tcggles 
and control parameters. Toggles take on the values 1 and 0 
(true or false), while parameters take on appropriate 
values. 4 

Control switches are specified by typing a $$ in cclumnos 
1 and 2, and a switch name starting in column 3 (only the 
first character of the switch name is significant). The 
switch name is followed by an equal sign (=) and an integer 


value. Ccntrol switches are listed in Appendix B. 


E. $ COMMAND STATEMENTS 
The $ Command Statements are used freely within the 
source file after the $$ SOURCE card. These statements are 
part of the processor portion of PREDITOR. PREDITOR 
translates $ Command Statements to standard FCRTRAN 
subroutine calls. 
1. $ ourpur 
The $ CUTPUT allows output of strings and integers. 
The use of the concatenation feature within the CUTPUT 
statement provides for a continuous output of strings and 
integers. A dollar Sign ($) is placed in column 1 cf the 
source file, followed by at least one blank, with the 
remainder cf the statement being free format. The CUTPUT 
statement takes the foliowing forn: 
$ OUGPUT ( ) 
All information to be written out is contained between the 
two parentheses. The statement must terminate with a right 
parenthesis prior to column 73. 
a. Strings 
Strings are delimited by the single quote (*). 
All characters which appear between two quotes are 
considered part of the string. The use of two adjacent 
quote marks inside the string results in the output of a 
Single quote. Although the maximum length of text that one 
OUTPUT statement can process is 64 characters, the outrut of 


a longer text can be performed using the concatenation 
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feature in ccnjunction with as many OUTPUT statements as are 
needed. Concatenation may be used to suppress dumping of 
the output buffer. This allows strings or integers which 
follow to be placed jn the current buffer as shown in the 
following example. 


S OUTPUT (*THIS IS A TEST * 
$ OUTPUT {/7* SERING*) — 


The output wculd appear as THIS IS A TEST STRING. 

b. Integers 

Integers may be represeated as variable names or 
constants. Four bases are available: binary, octal, 
decimal, cr hexadecimal. A variable field width is also 
available with the option of blanks or zeros to fill ovt the 
field. To output an integer variable or constant, the 
Statement must be of the form: 
(x) naAnnon : y 
The value x in parentheses is optional and specifies a field 
width. If ncne is specified, a default width of 5 is used. 
If a negative value is given, the field is padded with 
blanks instead of zeros. The nnnnnn field is the. variable 
or constant field, while the y represents the radix desired 
and is also cptional, but defaults to base 10 if none is 
specified. All three components may be either integer 
Values or variables with integer values. The negative 
"concatenation option (/-/} can be used effectively in 
conjunction with -the field width to prceduce a desired 
output. A /-f/ will cause all leading blanks in a field 
width to be deleted. This allows integers tc be 
left-justified when concatenated with strings ocr other 
Numbers as shcwn in the following example. 
$ OUTPUT ('*THE VALUE OF K IS '/-/(-10) K:10) 
The output would appear as THE VALUE OF K IS 5 where kK has 
the value 5. 
2. $ COPY 
The $COPY statement causes the text associated with 


the statement to be inserted at that point in the source 
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code. The statement must take the form: 

$ COPY xx 
The dollar sign (¢) is placed in column 1, followed by at 
least one blank, with the remainder of the statement free 
format. The number xx is any integer between 1 and 99. 

3. $_APPEND_ VERSE 
The $ APPEND VERSE has the form: 

$ APPEND VERSE 
The dollar sign must again be piaced in column 1, followed 
by at least one blank, with the remainder of the statement 
format free. This causes the vector VERSE, which contains 
the packed output data, to be copied into the new source 
file at this point. The associated FORTRAN equivalence 
statements will be built at this time. ; 
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V.  SUNMARY 


Within the areas discussed, each effort made to increase 
the portability of software has offered some distinct 
advantages. Both the Mobile Programming System and LIMP are 
Macro prccessing systems which were developed for 
constructing machine independent software, but attack the 
problem with different concepts in mind. While the Mobile 
Programming System was designed to be transferred with the 
software, LIMP must meet this goal by processing programs at 
those installations which support the language WISP. The 
Mobile Programming System is capable of being bootstrapped 
on most computing machines to a level which best meets the 
needs of the software to be processed. LIME, on the other 
hand, was designed to translate the software into cne of 
eight different languages. Although LIMP itself is bound to 
those systems which support WISP, the resulting software may 
be transferred to any machine which supports one of those 
eight langyages. 

The use of high-level language programming has alsc made 
a Significant contribution to software portability. 
Standardization of programming languages and the attempt by 
many software manufacturers to produce a product which is 
easily understood and modified, has made transferability of 
software a much easier problem to _ soive. Ail methods 
discussed have experienced a degree of success. There is, 
however, another guestion which must be considered when the 
subject cf portability arises. That is, what is the 
efficiency cf the final product. Because most systens 
designed for transferability are coded with the concept of 
structyed programming in mind, critical routines can be 
singled cut and recoded in assembly language to increase 
efficiency. Although there are currently no comparative 


studies of efficiency of the macro processor systems 
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mentioned, Waite (Ref. 6] suggests that the “effort 
involved in this recoding is miniscule compared with that 
involved in hand~coding the entire processor." The success 
of this methcdology is evident in the implementation of PL/M 
on the IEM System 360. With a minimum amount of alteration, 
efficiency was increased by approximately forty percent. 

In the final analysis, the efficiency of the systems and 
methodologies used will be determined by the degree of 
development in those areas. The mobility associated with 
macro processors and high-level languages, however, has heen 
demonstrated as a viable tocol for isgplementaticn of 


programming languages on a variety of computing machines. 
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AFPENDIX A: FORMAL DEFINITION OF EREDITOR 


<PROGRAM> 2:= <STATEMENT LIST> 


<STATEMENT LIST> ::= <STATEMENT> 
| <STATEMENT LISTD><STATEMENT> 


<STATEMENT> ::= <OUTPUT STATEMENT> 
<APPEND STATEMENT> 
<COPY STATEMENT> 
<OUTPUT STATEMENT> ::= <OUTPUT HEAD> ) 
<APPEND STATEMENT> 2:= <APPEND><SUBJECT> 
<COPY STATEMENT> :3= <COPY><NUHKBER>D 
<OUTPUT HEAD> ::= <OUTPUT> 
<OUTPUT HEAD><STRING> 
<OUTPUT HEAD><CONCAT> 
<OUTPUT HEADD><NCONCAT>D 
| <OUTPUT HEAD><CONOUT CALL> 


<CONOUT CALL> ::= <CONOUT STATEMENT> 
{ <CONOUT CALL><RADIX> 


<CONCUT STATEMENTS 2:3= <IDENTIFIER> 
<NUMBER> 
<FIELD WIDTHD><IDENTIFIER> 
<FIELD WIDTH><NUMBER> 
<FIELD WIDTH> 3::= ( <NUMBERD> ) 


<RADIX> ; DIX HEADD><IDENTIFIER> 
DiX HEAD><NUMBERD> 


<RADIX HEAD> 2::= 3 
<COPY> =:3s= . COPY 
<OUTPUT> ::= OULPUT 
<APPEND> ::= APPEND 
<SUBJECT> ::= VERSE 
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¥203 ore 

« RORDIO: ee. 
aueaga ers am 
geeky wer: <6 


Switch Nase 
$S$APATCH=n 
$$BSEQUENCE=n 
$$DELTA=n 
SS$EMARGIN=n 


S$S$HWDSIZE=n 
$SINPUT=n 


$$MERGE ~— 
$$OUTPUT=n 


$$PRINT 
$$RMARGIN=n 
$$SEQUENCE 
$$WORDSIZE=n 


APPENDIX Bs PREDITOR CONTROL TOGGLES 


The patch deck input file number = a 


Begin:sequence numbering at n 
Seguence number increment = n 


Set the output line width to a 
characters. 


Host machine wordsize = n 


Switch to file n for subsequent 
input ,(see file numbering). 


Edit mode: T or F 


Write subsequent output lines to 
file a 


Output lines to the printer: T or F 
Logical record size = n 
Resequence the source file: T or F 


Target machine wordsize = n 


Defaylt 


80 


EF 


NOTE: All input files are maximum of 80 characters, and the 
output files cannot exceed 120 characters. 
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APPENDIX C: ERROR MESSAGES 


Message 


Illegal symbol pair. The symbois printed cannot 
appear ina valid statement. This error may have 
been caused by a previous error in the prograg. 


Parse stack overflow. Simplify the statement or 
declare a larger parse stack and recompile. 


Table overflow. Error may be result oe oe Say 
variables in use at one time. Either sinplif he 
OUTPUT statement or increase the varc size an 
reccmpile. 


Improperly formed statement. The statement akove 
is improperly formed. Check formal BNF for def- 
anition and usage. 


Inccrrect format for concatenation used. Profer 

format is: a 

// +: Append to the current output kuffer. 

Saha apyene to the current output Ltuffer and 
delete the leading blanks. 


String length exceeds allowable limits. Use _ . 
shorter string length combined with concatenation. 


Variable exceeds FORTRAN limits. Variable | 
listed below is greater than six Characters in 
length. Rename the variable. 

A $$CCNTROL statement is eee formed. 
Check ail CONTROL statements to insure 


$$ FEATCH 
$$CCNTROL TOGGLE 
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APPENDIX D: 


FILE DEFINITIONS 


INPUT OUTPUT 
NUMBER DEVICE UNIT NUM DEVICE ONIT . 
* 
1 CARDRDR 5 : 1 PRINTER 6 
2 TELTYPE 4 : 2 TELTYPE 4 
3 PAPTAPE 6 : 3 PUNCH 7 
4 MAGTAPE 7 * ae MAGTAPE 8 
5 CSKFILE 8 : 5 DSKFILE -) 
6 USKFILE 9 cee 6 DSKFILE 10 
7 AVAILABLE 10 * 7 PAPTAPE 11 
NOTE: Unit numbers may be altered to fit user requirements 


ky accessing subroutines RDTEXT and WRITEL. These 
are the only references to these unit numbers. 
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